10 POKE54295,4:POKE54276,9
20 FORI=54272TO54295:POKEI,0:NEXT
30 POKE54296,15:POKE54287,25:POKE54278,255:POKE54276,23:FORZZ=0TO50:NEXTZZ
40 FORA=0TO55
50 POKE54273,A
60 NEXTA
70 FORZ=0TO100:NEXT:POKE54278,15:POKE54276,17
80 GOTO10